object ModuloDatosUsuario: TModuloDatosUsuario
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Height = 516
  Width = 741
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;User ID=cacazo;Initial Catalog=BUFETEURL;Data Source=DE' +
      'LL1-PC\JITOSQL;Use Procedure for Prepare=1;Auto Translate=True;P' +
      'acket Size=4096;Workstation ID=DELL1-PC;Use Encryption for Data=' +
      'False;Tag with column collation when possible=False'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 24
    Top = 8
  end
  object BusquedaUsuario: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = BusquedaUsuarioCalcFields
    Parameters = <>
    SQL.Strings = (
      'select * from Usuario'
      'where TIPO <> 0')
    Left = 104
    Top = 8
    object BusquedaUsuarioID_USUARIO: TAutoIncField
      FieldName = 'ID_USUARIO'
      ReadOnly = True
    end
    object BusquedaUsuarioNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Required = True
      Size = 50
    end
    object BusquedaUsuarioAPELLIDOS: TStringField
      FieldName = 'APELLIDOS'
      Required = True
      Size = 30
    end
    object BusquedaUsuarioTIPO: TSmallintField
      FieldName = 'TIPO'
    end
    object BusquedaUsuarioEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 60
    end
    object BusquedaUsuarioDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Required = True
      Size = 150
    end
    object BusquedaUsuarioTEL_CASA: TStringField
      FieldName = 'TEL_CASA'
      FixedChar = True
      Size = 9
    end
    object BusquedaUsuarioCELULAR: TStringField
      FieldName = 'CELULAR'
      FixedChar = True
      Size = 9
    end
    object BusquedaUsuarioLABORAL: TBooleanField
      FieldName = 'LABORAL'
    end
    object BusquedaUsuarioPENAL: TBooleanField
      FieldName = 'PENAL'
    end
    object BusquedaUsuarioCIVIL: TBooleanField
      FieldName = 'CIVIL'
    end
    object BusquedaUsuarioSUPERVISOR: TBooleanField
      FieldName = 'SUPERVISOR'
    end
    object BusquedaUsuarioNICK: TStringField
      FieldName = 'NICK'
      Size = 15
    end
    object BusquedaUsuarioPASSWORD: TStringField
      FieldName = 'PASSWORD'
      FixedChar = True
      Size = 32
    end
    object BusquedaUsuarioACTIVO: TBooleanField
      FieldName = 'ACTIVO'
    end
    object BusquedaUsuarioNOMBRECOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'NOMBRECOMPLETO'
      Calculated = True
    end
  end
  object DSbusquedaUsuario: TDataSource
    DataSet = BusquedaUsuario
    Left = 184
    Top = 8
  end
  object ConsultaContarUsuario: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'NombreUsuario'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end>
    SQL.Strings = (
      'select * from USUARIO'
      'where NICK = :NombreUsuario')
    Left = 24
    Top = 64
  end
  object ConsultaInicioSesion: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'NombreUsuario'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 15
        Value = Null
      end
      item
        Name = 'Password'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 32
        Value = Null
      end>
    SQL.Strings = (
      'select * from USUARIO'
      'where NICK = :NombreUsuario'
      'and PASSWORD = :Password')
    Left = 128
    Top = 64
    object ConsultaInicioSesionID_USUARIO: TAutoIncField
      FieldName = 'ID_USUARIO'
      ReadOnly = True
    end
    object ConsultaInicioSesionNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Size = 50
    end
    object ConsultaInicioSesionAPELLIDOS: TStringField
      FieldName = 'APELLIDOS'
      Size = 30
    end
    object ConsultaInicioSesionTIPO: TSmallintField
      FieldName = 'TIPO'
    end
    object ConsultaInicioSesionEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 60
    end
    object ConsultaInicioSesionDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Size = 150
    end
    object ConsultaInicioSesionTEL_CASA: TStringField
      FieldName = 'TEL_CASA'
      FixedChar = True
      Size = 9
    end
    object ConsultaInicioSesionCELULAR: TStringField
      FieldName = 'CELULAR'
      FixedChar = True
      Size = 9
    end
    object ConsultaInicioSesionLABORAL: TBooleanField
      FieldName = 'LABORAL'
    end
    object ConsultaInicioSesionPENAL: TBooleanField
      FieldName = 'PENAL'
    end
    object ConsultaInicioSesionCIVIL: TBooleanField
      FieldName = 'CIVIL'
    end
    object ConsultaInicioSesionSUPERVISOR: TBooleanField
      FieldName = 'SUPERVISOR'
    end
    object ConsultaInicioSesionNICK: TStringField
      FieldName = 'NICK'
      Size = 15
    end
    object ConsultaInicioSesionPASSWORD: TStringField
      FieldName = 'PASSWORD'
      FixedChar = True
      Size = 32
    end
    object ConsultaInicioSesionACTIVO: TBooleanField
      FieldName = 'ACTIVO'
    end
  end
  object EstudianteBusqueda: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = EstudianteBusquedaCalcFields
    Parameters = <>
    SQL.Strings = (
      'select * from ESTUDIANTE')
    Left = 104
    Top = 128
    object EstudianteBusquedaCARNE: TStringField
      FieldName = 'CARNE'
      Required = True
      FixedChar = True
      Size = 9
    end
    object EstudianteBusquedaID_MUNICIPIO: TIntegerField
      FieldName = 'ID_MUNICIPIO'
    end
    object EstudianteBusquedaID_DEPTO: TIntegerField
      FieldName = 'ID_DEPTO'
      OnChange = EstudianteBusquedaID_DEPTOChange
    end
    object EstudianteBusquedaID_ESTADO_CIVIL: TIntegerField
      FieldName = 'ID_ESTADO_CIVIL'
      Required = True
    end
    object EstudianteBusquedaNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Required = True
      Size = 50
    end
    object EstudianteBusquedaAPELLIDOS: TStringField
      FieldName = 'APELLIDOS'
      Required = True
      Size = 30
    end
    object EstudianteBusquedaTEL_CASA: TStringField
      FieldName = 'TEL_CASA'
      Required = True
      FixedChar = True
      Size = 9
    end
    object EstudianteBusquedaTEL_PERSONAL: TStringField
      FieldName = 'TEL_PERSONAL'
      FixedChar = True
      Size = 9
    end
    object EstudianteBusquedaTEL_TRABAJO: TStringField
      FieldName = 'TEL_TRABAJO'
      FixedChar = True
      Size = 9
    end
    object EstudianteBusquedaDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Required = True
      Size = 150
    end
    object EstudianteBusquedaCEDULA_REGISTRO: TIntegerField
      FieldName = 'CEDULA_REGISTRO'
    end
    object EstudianteBusquedaDPI: TStringField
      FieldName = 'DPI'
      FixedChar = True
      Size = 15
    end
    object EstudianteBusquedaEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 60
    end
    object EstudianteBusquedaPENSUM: TStringField
      FieldName = 'PENSUM'
      Required = True
      FixedChar = True
      Size = 8
    end
    object EstudianteBusquedaNO_FOLIO: TStringField
      FieldName = 'NO_FOLIO'
      Required = True
      Size = 10
    end
    object EstudianteBusquedaNO_LIBRO: TStringField
      FieldName = 'NO_LIBRO'
      Required = True
      Size = 10
    end
    object EstudianteBusquedaNOMBRECOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'NOMBRECOMPLETO'
      Size = 80
      Calculated = True
    end
    object EstudianteBusquedaFECHA_INGRESO: TDateTimeField
      FieldName = 'FECHA_INGRESO'
    end
  end
  object DSestudiante: TDataSource
    DataSet = EstudianteBusqueda
    Left = 184
    Top = 128
  end
  object Departamentos: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'DEPARTAMENTO'
    Left = 552
    Top = 8
  end
  object DSdepartamentos: TDataSource
    DataSet = Departamentos
    Left = 640
    Top = 8
  end
  object DSmunicipio: TDataSource
    DataSet = Municipios
    Left = 640
    Top = 80
  end
  object EstadoCivil: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'ESTADO_CIVIL'
    Left = 560
    Top = 152
  end
  object DSestadoCivil: TDataSource
    DataSet = EstadoCivil
    Left = 640
    Top = 152
  end
  object DScasosLaboral: TDataSource
    DataSet = CasoLaboral
    Left = 184
    Top = 192
  end
  object CasoLaboral: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = CasoLaboralCalcFields
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from ASIGNACION_LABORAL'
      'where CARNE = :PcarneEstudiante')
    Left = 104
    Top = 192
    object CasoLaboralID_ASIGNACION_LABORAL: TAutoIncField
      FieldName = 'ID_ASIGNACION_LABORAL'
      ReadOnly = True
    end
    object CasoLaboralID_CASO_LABORAL: TIntegerField
      FieldName = 'ID_CASO_LABORAL'
    end
    object CasoLaboralCODIGO_CASO_LABORAL: TStringField
      FieldName = 'CODIGO_CASO_LABORAL'
      FixedChar = True
      Size = 3
    end
    object CasoLaboralANIO_CASO_LABORAL: TIntegerField
      FieldName = 'ANIO_CASO_LABORAL'
    end
    object CasoLaboralCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object CasoLaboralFECHA_ASIGNACION: TWideStringField
      FieldName = 'FECHA_ASIGNACION'
      Size = 10
    end
    object CasoLaboralFECHA_VALORACION: TWideStringField
      FieldName = 'FECHA_VALORACION'
      Size = 10
    end
    object CasoLaboralVALORACION: TBCDField
      FieldName = 'VALORACION'
      Precision = 3
      Size = 2
    end
    object CasoLaboralAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object CasoLaboralNOMBRE_ASESOR: TStringField
      FieldName = 'NOMBRE_ASESOR'
      Size = 80
    end
    object CasoLaboralID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object CasoLaboralCODIGOCOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPLETO'
      Calculated = True
    end
  end
  object Asesores: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = AsesoresCalcFields
    TableName = 'USUARIO'
    Left = 568
    Top = 224
    object AsesoresID_USUARIO: TAutoIncField
      FieldName = 'ID_USUARIO'
      ReadOnly = True
    end
    object AsesoresNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Size = 50
    end
    object AsesoresAPELLIDOS: TStringField
      FieldName = 'APELLIDOS'
      Size = 30
    end
    object AsesoresTIPO: TSmallintField
      FieldName = 'TIPO'
    end
    object AsesoresEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 60
    end
    object AsesoresDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Size = 150
    end
    object AsesoresTEL_CASA: TStringField
      FieldName = 'TEL_CASA'
      FixedChar = True
      Size = 9
    end
    object AsesoresCELULAR: TStringField
      FieldName = 'CELULAR'
      FixedChar = True
      Size = 9
    end
    object AsesoresLABORAL: TBooleanField
      FieldName = 'LABORAL'
    end
    object AsesoresPENAL: TBooleanField
      FieldName = 'PENAL'
    end
    object AsesoresCIVIL: TBooleanField
      FieldName = 'CIVIL'
    end
    object AsesoresSUPERVISOR: TBooleanField
      FieldName = 'SUPERVISOR'
    end
    object AsesoresNICK: TStringField
      FieldName = 'NICK'
      Size = 15
    end
    object AsesoresPASSWORD: TStringField
      FieldName = 'PASSWORD'
      FixedChar = True
      Size = 32
    end
    object AsesoresACTIVO: TBooleanField
      FieldName = 'ACTIVO'
    end
    object AsesoresNOMBRECOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'NOMBRECOMPLETO'
      Size = 80
      Calculated = True
    end
  end
  object DSasesores: TDataSource
    DataSet = Asesores
    Left = 632
    Top = 224
  end
  object CasoCivil: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from ASIGNACION_CIVIL'
      'where CARNE = :PcarneEstudiante')
    Left = 104
    Top = 256
    object CasoCivilID_ASIGNACION_CIVIL: TAutoIncField
      FieldName = 'ID_ASIGNACION_CIVIL'
      ReadOnly = True
    end
    object CasoCivilCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object CasoCivilID_CASO_CIVIL: TIntegerField
      FieldName = 'ID_CASO_CIVIL'
    end
    object CasoCivilCODIGO_CASO_CIVIL: TStringField
      FieldName = 'CODIGO_CASO_CIVIL'
      FixedChar = True
      Size = 2
    end
    object CasoCivilANIO_CASO_CIVIL: TIntegerField
      FieldName = 'ANIO_CASO_CIVIL'
    end
    object CasoCivilVALORACION: TBCDField
      FieldName = 'VALORACION'
      Precision = 3
      Size = 2
    end
    object CasoCivilAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object CasoCivilID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object CasoCivilObservaciones: TWideStringField
      FieldName = 'Observaciones'
      FixedChar = True
      Size = 256
    end
    object CasoCivilCODIGOCOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPLETO'
      Calculated = True
    end
    object CasoCivilFECHA_ASIGNACION: TDateTimeField
      FieldName = 'FECHA_ASIGNACION'
    end
    object CasoCivilFECHA_VALORACION: TDateTimeField
      FieldName = 'FECHA_VALORACION'
    end
    object CasoCivilActivo: TBooleanField
      FieldName = 'Activo'
    end
  end
  object Pasantias: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = PasantiasCalcFields
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from PASANTIA'
      'where CARNE = :PcarneEstudiante')
    Left = 104
    Top = 320
    object PasantiasID_PASANTIA: TAutoIncField
      FieldName = 'ID_PASANTIA'
      ReadOnly = True
    end
    object PasantiasCODIGO_PASANTIA: TStringField
      FieldName = 'CODIGO_PASANTIA'
      FixedChar = True
      Size = 1
    end
    object PasantiasANIO_PASANTIA: TIntegerField
      FieldName = 'ANIO_PASANTIA'
    end
    object PasantiasID_INSTITUCION: TIntegerField
      FieldName = 'ID_INSTITUCION'
    end
    object PasantiasID_SUPERVISOR: TIntegerField
      FieldName = 'ID_SUPERVISOR'
    end
    object PasantiasID_ASESOR: TIntegerField
      FieldName = 'ID_ASESOR'
    end
    object PasantiasCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object PasantiasTIPO_PASANTIA: TSmallintField
      FieldName = 'TIPO_PASANTIA'
    end
    object PasantiasAREA_PASANTIA: TSmallintField
      FieldName = 'AREA_PASANTIA'
    end
    object PasantiasFECHA_INICIO: TDateTimeField
      FieldName = 'FECHA_INICIO'
    end
    object PasantiasFECHA_FIN: TDateTimeField
      FieldName = 'FECHA_FIN'
    end
    object PasantiasHORA_ENTRADA: TWideStringField
      FieldName = 'HORA_ENTRADA'
      Size = 8
    end
    object PasantiasHORA_SALIDA: TWideStringField
      FieldName = 'HORA_SALIDA'
      Size = 8
    end
    object PasantiasTOTAL_HORAS: TBCDField
      FieldName = 'TOTAL_HORAS'
      Precision = 4
      Size = 1
    end
    object PasantiasAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object PasantiasOBSERVACIONES: TStringField
      FieldName = 'OBSERVACIONES'
      Size = 255
    end
    object PasantiasCODIGOCOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPLETO'
      Calculated = True
    end
    object PasantiasAREACALCULADA: TStringField
      FieldKind = fkCalculated
      FieldName = 'AREACALCULADA'
      Calculated = True
    end
  end
  object LaboratorioPenal: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = LaboratorioPenalCalcFields
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from LABORATORIO_PENAL'
      'where CARNE = :PcarneEstudiante')
    Left = 104
    Top = 376
    object LaboratorioPenalID_LABORATORIO_PENAL: TIntegerField
      FieldName = 'ID_LABORATORIO_PENAL'
    end
    object LaboratorioPenalCODIGO_LABORATORIO_PENAL: TStringField
      FieldName = 'CODIGO_LABORATORIO_PENAL'
      FixedChar = True
      Size = 3
    end
    object LaboratorioPenalANIO_LABORATORIO_PENAL: TIntegerField
      FieldName = 'ANIO_LABORATORIO_PENAL'
    end
    object LaboratorioPenalID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object LaboratorioPenalCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object LaboratorioPenalNOMBRE_SINDICADO: TStringField
      FieldName = 'NOMBRE_SINDICADO'
      Size = 80
    end
    object LaboratorioPenalDELITO: TStringField
      FieldName = 'DELITO'
      Size = 60
    end
    object LaboratorioPenalAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object LaboratorioPenalFECHA_APROBACION_LABORATORIO: TDateTimeField
      FieldName = 'FECHA_APROBACION_LABORATORIO'
    end
    object LaboratorioPenalFECHA_INICIO: TDateTimeField
      FieldName = 'FECHA_INICIO'
    end
    object LaboratorioPenalFECHA_FIN: TDateTimeField
      FieldName = 'FECHA_FIN'
    end
    object LaboratorioPenalOBSERVACIONES: TStringField
      FieldName = 'OBSERVACIONES'
      Size = 256
    end
    object LaboratorioPenalCODIGOCOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPLETO'
      Calculated = True
    end
  end
  object LaboratorioLaboral: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = LaboratorioLaboralCalcFields
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from LABORATORIO_LABORAL'
      'where CARNE = :PcarneEstudiante')
    Left = 296
    Top = 8
    object LaboratorioLaboralID_LABORATORIO_LABORAL: TAutoIncField
      FieldName = 'ID_LABORATORIO_LABORAL'
      ReadOnly = True
    end
    object LaboratorioLaboralCODIGO_LABORATORIO_LABORAL: TStringField
      FieldName = 'CODIGO_LABORATORIO_LABORAL'
      FixedChar = True
      Size = 3
    end
    object LaboratorioLaboralANIO_LABORATORIO_LABORAL: TIntegerField
      FieldName = 'ANIO_LABORATORIO_LABORAL'
    end
    object LaboratorioLaboralCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object LaboratorioLaboralEST_CARNE: TStringField
      FieldName = 'EST_CARNE'
      FixedChar = True
      Size = 9
    end
    object LaboratorioLaboralEST_CARNE2: TStringField
      FieldName = 'EST_CARNE2'
      FixedChar = True
      Size = 9
    end
    object LaboratorioLaboralID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object LaboratorioLaboralNOMBRE_ACTOR: TStringField
      FieldName = 'NOMBRE_ACTOR'
      Size = 80
    end
    object LaboratorioLaboralNOMBRE_DEMANDADO: TStringField
      FieldName = 'NOMBRE_DEMANDADO'
      Size = 80
    end
    object LaboratorioLaboralNOMBRE_JUEZ: TStringField
      FieldName = 'NOMBRE_JUEZ'
      Size = 80
    end
    object LaboratorioLaboralCLASE_JUICIO: TSmallintField
      FieldName = 'CLASE_JUICIO'
    end
    object LaboratorioLaboralAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object LaboratorioLaboralOBSERVACIONES: TStringField
      FieldName = 'OBSERVACIONES'
      Size = 256
    end
    object LaboratorioLaboralCODIGOCOMPELTO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPELTO'
      Calculated = True
    end
    object LaboratorioLaboralFECHA_APROBADO: TDateTimeField
      FieldName = 'FECHA_APROBADO'
    end
    object LaboratorioLaboralFECHA_INICIO: TDateTimeField
      FieldName = 'FECHA_INICIO'
    end
    object LaboratorioLaboralFECHA_FIN: TDateTimeField
      FieldName = 'FECHA_FIN'
    end
  end
  object ClinicaPenal: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = ClinicaPenalCalcFields
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from CLINICA_PENAL'
      'where CARNE = :PcarneEstudiante')
    Left = 296
    Top = 72
    object ClinicaPenalID_CLINICA_PENAL: TAutoIncField
      FieldName = 'ID_CLINICA_PENAL'
      ReadOnly = True
    end
    object ClinicaPenalCODIGO_CLINICA_PENAL: TStringField
      FieldName = 'CODIGO_CLINICA_PENAL'
      FixedChar = True
      Size = 3
    end
    object ClinicaPenalANIO_CLINICA_PENAL: TIntegerField
      FieldName = 'ANIO_CLINICA_PENAL'
    end
    object ClinicaPenalID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object ClinicaPenalCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object ClinicaPenalNOMBRE_SINDICADO: TStringField
      FieldName = 'NOMBRE_SINDICADO'
      Size = 80
    end
    object ClinicaPenalDELITO: TStringField
      FieldName = 'DELITO'
      Size = 60
    end
    object ClinicaPenalAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object ClinicaPenalFECHA_ENTREGA_INFORME: TDateTimeField
      FieldName = 'FECHA_ENTREGA_INFORME'
    end
    object ClinicaPenalFECHA_INICIO: TDateTimeField
      FieldName = 'FECHA_INICIO'
    end
    object ClinicaPenalFECHA_FIN: TDateTimeField
      FieldName = 'FECHA_FIN'
    end
    object ClinicaPenalOBSERVACIONES: TStringField
      FieldName = 'OBSERVACIONES'
      Size = 256
    end
    object ClinicaPenalFECHA_EMISION_DICTAMEN: TDateTimeField
      FieldName = 'FECHA_EMISION_DICTAMEN'
    end
    object ClinicaPenalCODIGOCOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPLETO'
      Calculated = True
    end
  end
  object ClinicaLaboral: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = ClinicaLaboralCalcFields
    Parameters = <
      item
        Name = 'PcarneEstudiante'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 9
        Value = ''
      end>
    SQL.Strings = (
      'select * from CLINICA_LABORAL'
      'where CARNE = :PcarneEstudiante')
    Left = 296
    Top = 144
    object ClinicaLaboralID_CLINICA_LABORAL: TAutoIncField
      FieldName = 'ID_CLINICA_LABORAL'
      ReadOnly = True
    end
    object ClinicaLaboralCODIGO_CLINICA_LABORAL: TStringField
      FieldName = 'CODIGO_CLINICA_LABORAL'
      FixedChar = True
      Size = 3
    end
    object ClinicaLaboralANIO_CLINICA_LABORAL: TIntegerField
      FieldName = 'ANIO_CLINICA_LABORAL'
    end
    object ClinicaLaboralID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object ClinicaLaboralCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object ClinicaLaboralNOMBRE_ACTOR: TStringField
      FieldName = 'NOMBRE_ACTOR'
      Size = 80
    end
    object ClinicaLaboralNOMBRE_DEMANDADO: TStringField
      FieldName = 'NOMBRE_DEMANDADO'
      Size = 80
    end
    object ClinicaLaboralNOMBRE_JUEZ: TStringField
      FieldName = 'NOMBRE_JUEZ'
      Size = 80
    end
    object ClinicaLaboralCLASE_JUICIO: TSmallintField
      FieldName = 'CLASE_JUICIO'
    end
    object ClinicaLaboralAPROBADO: TBooleanField
      FieldName = 'APROBADO'
    end
    object ClinicaLaboralOBSERVACIONES: TStringField
      FieldName = 'OBSERVACIONES'
      Size = 256
    end
    object ClinicaLaboralCODIGOCOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'CODIGOCOMPLETO'
      Calculated = True
    end
    object ClinicaLaboralFECHA_APROBADO: TDateTimeField
      FieldName = 'FECHA_APROBADO'
    end
    object ClinicaLaboralFECHA_INICIO: TDateTimeField
      FieldName = 'FECHA_INICIO'
    end
    object ClinicaLaboralFECHA_FIN: TDateTimeField
      FieldName = 'FECHA_FIN'
    end
  end
  object DScasocivl: TDataSource
    DataSet = CasoCivil
    Left = 184
    Top = 248
  end
  object DSpasantias: TDataSource
    DataSet = Pasantias
    Left = 184
    Top = 312
  end
  object DSlaboratorioPenal: TDataSource
    DataSet = LaboratorioPenal
    Left = 184
    Top = 368
  end
  object DSlaboratorioLaboral: TDataSource
    DataSet = LaboratorioLaboral
    Left = 376
    Top = 8
  end
  object DSclinicaPenal: TDataSource
    DataSet = ClinicaPenal
    Left = 376
    Top = 72
  end
  object DSclinicaLaboral: TDataSource
    DataSet = ClinicaLaboral
    Left = 376
    Top = 144
  end
  object Patrocinado: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'PATROCINADO'
    Left = 568
    Top = 288
  end
  object DSpatrocinado: TDataSource
    DataSet = Patrocinado
    Left = 656
    Top = 296
  end
  object Instituciones: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'INSTITUCION'
    Left = 568
    Top = 360
    object InstitucionesID_INSTITUCION: TAutoIncField
      FieldName = 'ID_INSTITUCION'
      ReadOnly = True
    end
    object InstitucionesID_MUNICIPIO: TIntegerField
      FieldName = 'ID_MUNICIPIO'
    end
    object InstitucionesID_DEPTO: TIntegerField
      FieldName = 'ID_DEPTO'
    end
    object InstitucionesNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Size = 50
    end
    object InstitucionesDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Size = 150
    end
    object InstitucionesCASO_LABORAL: TBooleanField
      FieldName = 'CASO_LABORAL'
    end
    object InstitucionesCASO_CIVIL: TBooleanField
      FieldName = 'CASO_CIVIL'
    end
    object InstitucionesCLINICA_LABORAL: TBooleanField
      FieldName = 'CLINICA_LABORAL'
    end
    object InstitucionesCLINICA_CIVIL: TBooleanField
      FieldName = 'CLINICA_CIVIL'
    end
    object InstitucionesCLINICA_PENAL: TBooleanField
      FieldName = 'CLINICA_PENAL'
    end
    object InstitucionesPASANTIA_LABORAL: TBooleanField
      FieldName = 'PASANTIA_LABORAL'
    end
    object InstitucionesPASANTIA_CIVIL: TBooleanField
      FieldName = 'PASANTIA_CIVIL'
    end
    object InstitucionesPASANTIA_PENAL: TBooleanField
      FieldName = 'PASANTIA_PENAL'
    end
    object InstitucionesPASANTIA_CAJ: TBooleanField
      FieldName = 'PASANTIA_CAJ'
    end
  end
  object DSinstituciones: TDataSource
    DataSet = Instituciones
    Left = 648
    Top = 360
  end
  object Municipios: TADODataSet
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'select * from MUNICIPIO'#13#10'where ID_DEPTO = :departamento'
    Parameters = <
      item
        Name = 'departamento'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = 0
      end>
    Left = 560
    Top = 80
    object MunicipiosID_MUNICIPIO: TAutoIncField
      FieldName = 'ID_MUNICIPIO'
      ReadOnly = True
    end
    object MunicipiosID_DEPTO: TIntegerField
      FieldName = 'ID_DEPTO'
    end
    object MunicipiosMUNICIPIO: TStringField
      FieldName = 'MUNICIPIO'
      Size = 30
    end
  end
  object dxSkinController1: TdxSkinController
    SkinName = 'MoneyTwins'
    Left = 24
    Top = 424
  end
  object ReporteEstudianteHistorial: TfrxReport
    Version = '4.9'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 40812.026053541700000000
    ReportOptions.LastChange = 40816.029812164400000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      ''
      'begin'
      ''
      'end.')
    Left = 296
    Top = 200
    Datasets = <
      item
        DataSet = RCasoCivil
        DataSetName = 'CasoCivil'
      end
      item
        DataSet = RCasoLaboral
        DataSetName = 'CasoLaboral'
      end
      item
        DataSet = RClinicaLaboral
        DataSetName = 'ClinicaLaboral'
      end
      item
        DataSet = RClinicaPenal
        DataSetName = 'ClinicaPenal'
      end
      item
        DataSet = REstudiante
        DataSetName = 'Estudiante'
      end
      item
        DataSet = RLaboratorioLaboral
        DataSetName = 'LaboratorioLaboral'
      end
      item
        DataSet = RLaboratorioPenal
        DataSetName = 'LaboratorioPenal'
      end
      item
        DataSet = RPasantia
        DataSetName = 'Pasantia'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      PaperWidth = 215.900000000000000000
      PaperHeight = 279.400000000000000000
      PaperSize = 1
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object ReportTitle1: TfrxReportTitle
        Height = 43.708720000000000000
        Top = 18.897650000000000000
        Width = 740.409927000000000000
        object Line1: TfrxLineView
          Left = 12.456710000000000000
          Top = 29.811070000000000000
          Width = 706.772110000000000000
          ShowHint = False
          Frame.Color = 52479
          Frame.Typ = [ftTop]
        end
        object Memo2: TfrxMemoView
          Left = 14.779530000000000000
          Top = 2.000000000000000000
          Width = 733.228820000000000000
          Height = 34.015770000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 6960384
          Font.Height = -27
          Font.Name = 'Constantia'
          Font.Style = []
          Memo.UTF8W = (
            'Ficha Estudiante, historial de informaci'#243'n')
          ParentFont = False
        end
      end
      object MasterData1: TfrxMasterData
        Height = 86.078850000000000000
        Top = 124.724490000000000000
        Width = 740.409927000000000000
        DataSet = REstudiante
        DataSetName = 'Estudiante'
        RowCount = 0
        object EstudianteCARNE: TfrxMemoView
          Left = 82.488250000000000000
          Top = 23.826840000000000000
          Width = 215.433210000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = REstudiante
          DataSetName = 'Estudiante'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[Estudiante."CARNE"]')
          ParentFont = False
        end
        object EstudianteNOMBRECOMPLETO: TfrxMemoView
          Left = 77.188930000000000000
          Top = 67.181200000000000000
          Width = 638.740570000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = REstudiante
          DataSetName = 'Estudiante'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[Estudiante."NOMBRE"]')
          ParentFont = False
        end
        object EstudianteFECHA_INGRESO: TfrxMemoView
          Left = 343.937230000000000000
          Top = 23.826840000000000000
          Width = 393.071120000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = REstudiante
          DataSetName = 'Estudiante'
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de Inscripci'#243'n: [Estudiante."FECHA_INGRESO"]')
          ParentFont = False
        end
        object EstudianteAPELLIDOS: TfrxMemoView
          Left = 77.188930000000000000
          Top = 44.504020000000000000
          Width = 638.740570000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = REstudiante
          DataSetName = 'Estudiante'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[Estudiante."APELLIDOS"]')
          ParentFont = False
        end
        object Memo3: TfrxMemoView
          Left = 15.118120000000000000
          Top = 44.504020000000000000
          Width = 64.252010000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Apellidos:')
          ParentFont = False
        end
        object Memo4: TfrxMemoView
          Left = 15.118120000000000000
          Top = 67.181200000000000000
          Width = 64.252010000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Nombre:')
          ParentFont = False
        end
        object Memo37: TfrxMemoView
          Left = 15.118120000000000000
          Top = 23.574830000000000000
          Width = 64.252010000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Carn'#233':')
          ParentFont = False
        end
        object Memo42: TfrxMemoView
          Left = 15.118120000000000000
          Width = 234.330860000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Informaci'#243'n personal')
          ParentFont = False
        end
        object Line16: TfrxLineView
          Left = 16.236240000000000000
          Top = 19.897650000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line17: TfrxLineView
          Left = 16.236240000000000000
          Top = 0.881880000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
      end
      object PageFooter1: TfrxPageFooter
        Height = 22.677180000000000000
        Top = 1050.709340000000000000
        Width = 740.409927000000000000
        object Memo1: TfrxMemoView
          Left = 665.197280000000000000
          Width = 75.590600000000000000
          Height = 18.897650000000000000
          ShowHint = False
          HAlign = haRight
          Memo.UTF8W = (
            '[Page#]')
        end
        object Memo36: TfrxMemoView
          Left = 7.559060000000000000
          Top = 3.779530000000000000
          Width = 627.401980000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = [fsItalic]
          Memo.UTF8W = (
            
              'Bufete Popular - Universidad Rafale Landivar, campus Quetzaltena' +
              'ngo  [<Date>],[Time]')
          ParentFont = False
        end
      end
      object DetailData1: TfrxDetailData
        Height = 22.456710000000000000
        Top = 302.362400000000000000
        Width = 740.409927000000000000
        DataSet = RCasoCivil
        DataSetName = 'CasoCivil'
        RowCount = 0
        object CasoCivilFECHA_ASIGNACION: TfrxMemoView
          Left = 216.417440000000000000
          Top = 3.559060000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_ASIGNACION'
          DataSet = RCasoCivil
          DataSetName = 'CasoCivil'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoCivil."FECHA_ASIGNACION"]')
          ParentFont = False
        end
        object CasoCivilFECHA_VALORACION: TfrxMemoView
          Left = 391.953000000000000000
          Top = 3.559060000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_VALORACION'
          DataSet = RCasoCivil
          DataSetName = 'CasoCivil'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoCivil."FECHA_VALORACION"]')
          ParentFont = False
        end
        object CasoCivilVALORACION: TfrxMemoView
          Left = 600.590910000000000000
          Top = 3.559060000000000000
          Width = 30.236240000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'VALORACION'
          DataSet = RCasoCivil
          DataSetName = 'CasoCivil'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoCivil."VALORACION"]')
          ParentFont = False
        end
        object CasoCivilCODIGOCOMPLETO: TfrxMemoView
          Left = 14.354360000000000000
          Top = 3.252010000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPLETO'
          DataSet = RCasoCivil
          DataSetName = 'CasoCivil'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoCivil."CODIGOCOMPLETO"]')
          ParentFont = False
        end
      end
      object DetailData2: TfrxDetailData
        Height = 19.590600000000000000
        Top = 415.748300000000000000
        Width = 740.409927000000000000
        DataSet = RCasoLaboral
        DataSetName = 'CasoLaboral'
        RowCount = 0
        object CasoLaboralFECHA_ASIGNACION: TfrxMemoView
          Left = 219.787570000000000000
          Top = 0.692950000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_ASIGNACION'
          DataSet = RCasoLaboral
          DataSetName = 'CasoLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoLaboral."FECHA_ASIGNACION"]')
          ParentFont = False
        end
        object CasoLaboralFECHA_VALORACION: TfrxMemoView
          Left = 396.866420000000000000
          Top = 0.692950000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_VALORACION'
          DataSet = RCasoLaboral
          DataSetName = 'CasoLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoLaboral."FECHA_VALORACION"]')
          ParentFont = False
        end
        object CasoLaboralVALORACION: TfrxMemoView
          Left = 593.386210000000000000
          Top = 0.692950000000000000
          Width = 30.236240000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'VALORACION'
          DataSet = RCasoLaboral
          DataSetName = 'CasoLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoLaboral."VALORACION"]')
          ParentFont = False
        end
        object CasoLaboralCODIGOCOMPLETO: TfrxMemoView
          Left = 16.913420000000000000
          Top = 0.692950000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPLETO'
          DataSet = RCasoLaboral
          DataSetName = 'CasoLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[CasoLaboral."CODIGOCOMPLETO"]')
          ParentFont = False
        end
      end
      object DetailData3: TfrxDetailData
        Height = 20.370130000000000000
        Top = 525.354670000000000000
        Width = 740.409927000000000000
        DataSet = RClinicaPenal
        DataSetName = 'ClinicaPenal'
        RowCount = 0
        object ClinicaPenalFECHA_INICIO: TfrxMemoView
          Left = 213.567100000000000000
          Top = 1.472480000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INICIO'
          DataSet = RClinicaPenal
          DataSetName = 'ClinicaPenal'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaPenal."FECHA_INICIO"]')
          ParentFont = False
        end
        object ClinicaPenalFECHA_FIN: TfrxMemoView
          Left = 383.645950000000000000
          Top = 1.472480000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_FIN'
          DataSet = RClinicaPenal
          DataSetName = 'ClinicaPenal'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaPenal."FECHA_FIN"]')
          ParentFont = False
        end
        object ClinicaPenalAPROBADO: TfrxMemoView
          Left = 593.370440000000000000
          Top = 1.472480000000000000
          Width = 98.267780000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = RClinicaPenal
          DataSetName = 'ClinicaPenal'
          DisplayFormat.FormatStr = 'Reprobado,Aprobado'
          DisplayFormat.Kind = fkBoolean
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaPenal."APROBADO"]')
          ParentFont = False
        end
        object ClinicaPenalCODIGOCOMPLETO: TfrxMemoView
          Left = 18.897650000000000000
          Top = 1.472480000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPLETO'
          DataSet = RClinicaPenal
          DataSetName = 'ClinicaPenal'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaPenal."CODIGOCOMPLETO"]')
          ParentFont = False
        end
      end
      object DetailData4: TfrxDetailData
        Height = 20.590600000000000000
        Top = 631.181510000000000000
        Width = 740.409927000000000000
        DataSet = RClinicaLaboral
        DataSetName = 'ClinicaLaboral'
        RowCount = 0
        object ClinicaLaboralFECHA_INICIO: TfrxMemoView
          Left = 228.212740000000000000
          Top = 1.692950000000000000
          Width = 79.370130000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INICIO'
          DataSet = RClinicaLaboral
          DataSetName = 'ClinicaLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaLaboral."FECHA_INICIO"]')
          ParentFont = False
        end
        object ClinicaLaboralFECHA_FIN: TfrxMemoView
          Left = 394.512060000000000000
          Top = 1.692950000000000000
          Width = 79.370130000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_FIN'
          DataSet = RClinicaLaboral
          DataSetName = 'ClinicaLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaLaboral."FECHA_FIN"]')
          ParentFont = False
        end
        object ClinicaLaboralAPROBADO: TfrxMemoView
          Left = 593.386210000000000000
          Top = 1.692950000000000000
          Width = 90.708720000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = RClinicaLaboral
          DataSetName = 'ClinicaLaboral'
          DisplayFormat.FormatStr = 'Reprobado,Aprobado'
          DisplayFormat.Kind = fkBoolean
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaLaboral."APROBADO"]')
          ParentFont = False
        end
        object ClinicaLaboralCODIGOCOMPLETO: TfrxMemoView
          Left = 18.897650000000000000
          Top = 1.692950000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPLETO'
          DataSet = RClinicaLaboral
          DataSetName = 'ClinicaLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[ClinicaLaboral."CODIGOCOMPLETO"]')
          ParentFont = False
        end
      end
      object DetailData5: TfrxDetailData
        Height = 20.590600000000000000
        Top = 744.567410000000000000
        Width = 740.409927000000000000
        DataSet = RLaboratorioPenal
        DataSetName = 'LaboratorioPenal'
        RowCount = 0
        object LaboratorioPenalFECHA_INICIO: TfrxMemoView
          Left = 226.771800000000000000
          Top = 1.692950000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INICIO'
          DataSet = RLaboratorioPenal
          DataSetName = 'LaboratorioPenal'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioPenal."FECHA_INICIO"]')
          ParentFont = False
        end
        object LaboratorioPenalFECHA_INICIO1: TfrxMemoView
          Left = 396.850650000000000000
          Top = 1.692950000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INICIO'
          DataSet = RLaboratorioPenal
          DataSetName = 'LaboratorioPenal'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioPenal."FECHA_INICIO"]')
          ParentFont = False
        end
        object LaboratorioPenalAPROBADO: TfrxMemoView
          Left = 593.386210000000000000
          Top = 1.692950000000000000
          Width = 90.708720000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = RLaboratorioPenal
          DataSetName = 'LaboratorioPenal'
          DisplayFormat.FormatStr = 'Reprobado,Aprobado'
          DisplayFormat.Kind = fkBoolean
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioPenal."APROBADO"]')
          ParentFont = False
        end
        object LaboratorioPenalCODIGOCOMPLETO: TfrxMemoView
          Left = 18.897650000000000000
          Top = 1.692950000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPLETO'
          DataSet = RLaboratorioPenal
          DataSetName = 'LaboratorioPenal'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioPenal."CODIGOCOMPLETO"]')
          ParentFont = False
        end
      end
      object DetailData6: TfrxDetailData
        Height = 21.370130000000000000
        Top = 857.953310000000000000
        Width = 740.409927000000000000
        DataSet = RLaboratorioLaboral
        DataSetName = 'LaboratorioLaboral'
        RowCount = 0
        object LaboratorioLaboralFECHA_INICIO: TfrxMemoView
          Left = 226.771800000000000000
          Top = 2.472480000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INICIO'
          DataSet = RLaboratorioLaboral
          DataSetName = 'LaboratorioLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioLaboral."FECHA_INICIO"]')
          ParentFont = False
        end
        object LaboratorioLaboralFECHA_FIN: TfrxMemoView
          Left = 396.850650000000000000
          Top = 2.472480000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_FIN'
          DataSet = RLaboratorioLaboral
          DataSetName = 'LaboratorioLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioLaboral."FECHA_FIN"]')
          ParentFont = False
        end
        object LaboratorioLaboralAPROBADO: TfrxMemoView
          Left = 593.386210000000000000
          Top = 2.472480000000000000
          Width = 90.708720000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = RLaboratorioLaboral
          DataSetName = 'LaboratorioLaboral'
          DisplayFormat.FormatStr = 'Reprobado,Aprobado'
          DisplayFormat.Kind = fkBoolean
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioLaboral."APROBADO"]')
          ParentFont = False
        end
        object LaboratorioLaboralCODIGOCOMPELTO1: TfrxMemoView
          Left = 18.897650000000000000
          Top = 2.472480000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPELTO'
          DataSet = RLaboratorioLaboral
          DataSetName = 'LaboratorioLaboral'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Memo.UTF8W = (
            '[LaboratorioLaboral."CODIGOCOMPELTO"]')
          ParentFont = False
        end
      end
      object Header2: TfrxHeader
        Height = 43.354360000000000000
        Top = 234.330860000000000000
        Width = 740.409927000000000000
        object Memo10: TfrxMemoView
          Left = 15.118120000000000000
          Top = 2.338590000000000000
          Width = 234.330860000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Casos del '#225'rea civil')
          ParentFont = False
        end
        object Line4: TfrxLineView
          Left = 16.236240000000000000
          Top = 22.236240000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line5: TfrxLineView
          Left = 16.236240000000000000
          Top = 3.220470000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo5: TfrxMemoView
          Left = 15.118120000000000000
          Top = 24.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo6: TfrxMemoView
          Left = 215.433210000000000000
          Top = 24.456710000000000000
          Width = 151.181200000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de Asignaci'#243'n')
          ParentFont = False
        end
        object Memo7: TfrxMemoView
          Left = 389.527830000000000000
          Top = 24.456710000000000000
          Width = 151.181200000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de Valoraci'#243'n')
          ParentFont = False
        end
        object Memo8: TfrxMemoView
          Left = 588.268090000000000000
          Top = 24.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Valoraci'#243'n')
          ParentFont = False
        end
      end
      object Header3: TfrxHeader
        Height = 43.354360000000000000
        Top = 347.716760000000000000
        Width = 740.409927000000000000
        object Memo11: TfrxMemoView
          Left = 15.118120000000000000
          Top = 2.897650000000000000
          Width = 234.330860000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Casos del '#225'rea laboral')
          ParentFont = False
        end
        object Line6: TfrxLineView
          Left = 16.236240000000000000
          Top = 22.795300000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line7: TfrxLineView
          Left = 16.236240000000000000
          Top = 3.779530000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo12: TfrxMemoView
          Left = 15.118120000000000000
          Top = 24.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo13: TfrxMemoView
          Left = 215.433210000000000000
          Top = 24.456710000000000000
          Width = 151.181200000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de Asignaci'#243'n')
          ParentFont = False
        end
        object Memo14: TfrxMemoView
          Left = 391.732530000000000000
          Top = 24.456710000000000000
          Width = 154.960730000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de Valoraci'#243'n')
          ParentFont = False
        end
        object Memo15: TfrxMemoView
          Left = 588.268090000000000000
          Top = 24.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Valoraci'#243'n')
          ParentFont = False
        end
      end
      object Header4: TfrxHeader
        Height = 44.354360000000000000
        Top = 457.323130000000000000
        Width = 740.409927000000000000
        object Memo20: TfrxMemoView
          Left = 15.118120000000000000
          Top = 2.897650000000000000
          Width = 234.330860000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Cl'#237'nicas del '#225'rea penal')
          ParentFont = False
        end
        object Line8: TfrxLineView
          Left = 16.236240000000000000
          Top = 22.795300000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line9: TfrxLineView
          Left = 16.236240000000000000
          Top = 3.779530000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo16: TfrxMemoView
          Left = 18.897650000000000000
          Top = 25.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo17: TfrxMemoView
          Left = 214.771800000000000000
          Top = 25.456710000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de inicio')
          ParentFont = False
        end
        object Memo18: TfrxMemoView
          Left = 384.512060000000000000
          Top = 25.456710000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de finalizaci'#243'n')
          ParentFont = False
        end
        object Memo19: TfrxMemoView
          Left = 559.236550000000000000
          Top = 25.456710000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Aprobado/Reprobado')
          ParentFont = False
        end
      end
      object Header5: TfrxHeader
        Height = 42.354360000000000000
        Top = 566.929500000000000000
        Width = 740.409927000000000000
        object Line10: TfrxLineView
          Left = 16.236240000000000000
          Top = 21.015770000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line11: TfrxLineView
          Left = 16.236240000000000000
          Top = 2.000000000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo21: TfrxMemoView
          Left = 20.897650000000000000
          Top = 1.000000000000000000
          Width = 234.330860000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Cl'#237'nicas del '#225'rea laboral')
          ParentFont = False
        end
        object Memo22: TfrxMemoView
          Left = 18.897650000000000000
          Top = 23.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo23: TfrxMemoView
          Left = 227.771800000000000000
          Top = 23.456710000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de inicio')
          ParentFont = False
        end
        object Memo24: TfrxMemoView
          Left = 393.512060000000000000
          Top = 23.456710000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de finalizaci'#243'n')
          ParentFont = False
        end
        object Memo25: TfrxMemoView
          Left = 559.236550000000000000
          Top = 23.456710000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Aprobado/Reprobado')
          ParentFont = False
        end
      end
      object Header1: TfrxHeader
        Height = 44.354360000000000000
        Top = 676.535870000000000000
        Width = 740.409927000000000000
        object Line12: TfrxLineView
          Left = 15.118120000000000000
          Top = 21.795300000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line13: TfrxLineView
          Left = 15.118120000000000000
          Top = 1.779530000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo26: TfrxMemoView
          Left = 17.779530000000000000
          Top = 1.897650000000000000
          Width = 260.787570000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Laboratorios del '#225'rea penal')
          ParentFont = False
        end
        object Memo32: TfrxMemoView
          Left = 18.897650000000000000
          Top = 25.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo33: TfrxMemoView
          Left = 227.771800000000000000
          Top = 25.456710000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de inicio')
          ParentFont = False
        end
        object Memo34: TfrxMemoView
          Left = 393.512060000000000000
          Top = 25.456710000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de finalizaci'#243'n')
          ParentFont = False
        end
        object Memo35: TfrxMemoView
          Left = 563.016080000000000000
          Top = 25.456710000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Aprobado/Reprobado')
          ParentFont = False
        end
      end
      object Header6: TfrxHeader
        Height = 43.354360000000000000
        Top = 789.921770000000000000
        Width = 740.409927000000000000
        object Line14: TfrxLineView
          Left = 16.236240000000000000
          Top = 21.015770000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line15: TfrxLineView
          Left = 16.236240000000000000
          Top = 1.000000000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo31: TfrxMemoView
          Left = 15.118120000000000000
          Top = 0.559060000000000000
          Width = 279.685220000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Laboratorios del '#225'rea laboral')
          ParentFont = False
        end
        object Memo27: TfrxMemoView
          Left = 18.897650000000000000
          Top = 24.456710000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo28: TfrxMemoView
          Left = 227.771800000000000000
          Top = 24.456710000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de inicio')
          ParentFont = False
        end
        object Memo29: TfrxMemoView
          Left = 393.512060000000000000
          Top = 24.456710000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de finalizaci'#243'n')
          ParentFont = False
        end
        object Memo30: TfrxMemoView
          Left = 563.016080000000000000
          Top = 24.456710000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Aprobado/Reprobado')
          ParentFont = False
        end
      end
      object Header7: TfrxHeader
        Height = 41.574830000000000000
        Top = 903.307670000000000000
        Width = 740.409927000000000000
        object Line2: TfrxLineView
          Left = 16.236240000000000000
          Top = 20.897650000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line3: TfrxLineView
          Left = 16.236240000000000000
          Top = 1.881880000000000000
          Width = 702.992580000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Memo41: TfrxMemoView
          Left = 15.118120000000000000
          Top = 2.000000000000000000
          Width = 279.685220000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Pasant'#237'as')
          ParentFont = False
        end
        object Memo9: TfrxMemoView
          Left = 18.897650000000000000
          Top = 22.677180000000000000
          Width = 68.031540000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'C'#243'digo')
          ParentFont = False
        end
        object Memo38: TfrxMemoView
          Left = 227.771800000000000000
          Top = 22.677180000000000000
          Width = 136.063080000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de inicio')
          ParentFont = False
        end
        object Memo39: TfrxMemoView
          Left = 393.512060000000000000
          Top = 22.677180000000000000
          Width = 147.401670000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de finalizaci'#243'n')
          ParentFont = False
        end
        object Memo40: TfrxMemoView
          Left = 563.016080000000000000
          Top = 22.677180000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Aprobado/Reprobado')
          ParentFont = False
        end
      end
      object DetailData7: TfrxDetailData
        Height = 20.795300000000000000
        Top = 967.559680000000000000
        Width = 740.409927000000000000
        DataSet = RPasantia
        DataSetName = 'Pasantia'
        RowCount = 0
        object PasantiaCODIGOCOMPLETO: TfrxMemoView
          Left = 18.897650000000000000
          Top = 1.897650000000000000
          Width = 158.740260000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CODIGOCOMPLETO'
          DataSet = RPasantia
          DataSetName = 'Pasantia'
          Memo.UTF8W = (
            '[Pasantia."CODIGOCOMPLETO"]')
        end
        object PasantiaFECHA_INICIO: TfrxMemoView
          Left = 226.771800000000000000
          Top = 1.897650000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INICIO'
          DataSet = RPasantia
          DataSetName = 'Pasantia'
          Memo.UTF8W = (
            '[Pasantia."FECHA_INICIO"]')
        end
        object PasantiaFECHA_FIN: TfrxMemoView
          Left = 396.850650000000000000
          Top = 1.897650000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_FIN'
          DataSet = RPasantia
          DataSetName = 'Pasantia'
          Memo.UTF8W = (
            '[Pasantia."FECHA_FIN"]')
        end
        object PasantiaAPROBADO: TfrxMemoView
          Left = 602.724800000000000000
          Top = 1.897650000000000000
          Width = 90.708720000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataSet = RPasantia
          DataSetName = 'Pasantia'
          DisplayFormat.FormatStr = 'Reprobado,Aprobado'
          DisplayFormat.Kind = fkBoolean
          Memo.UTF8W = (
            '[Pasantia."APROBADO"]')
        end
      end
    end
  end
  object REstudiante: TfrxDBDataset
    RangeBegin = rbCurrent
    RangeEnd = reCurrent
    UserName = 'Estudiante'
    CloseDataSource = False
    DataSource = DSestudiante
    BCDToCurrency = False
    Left = 280
    Top = 256
  end
  object RCasoCivil: TfrxDBDataset
    UserName = 'CasoCivil'
    CloseDataSource = False
    DataSource = DScasocivl
    BCDToCurrency = False
    Left = 280
    Top = 312
  end
  object RCasoLaboral: TfrxDBDataset
    UserName = 'CasoLaboral'
    CloseDataSource = False
    DataSource = DScasosLaboral
    BCDToCurrency = False
    Left = 280
    Top = 368
  end
  object RPasantia: TfrxDBDataset
    UserName = 'Pasantia'
    CloseDataSource = False
    DataSource = DSpasantias
    BCDToCurrency = False
    Left = 280
    Top = 416
  end
  object RLaboratorioPenal: TfrxDBDataset
    UserName = 'LaboratorioPenal'
    CloseDataSource = False
    DataSource = DSlaboratorioPenal
    BCDToCurrency = False
    Left = 344
    Top = 256
  end
  object RLaboratorioLaboral: TfrxDBDataset
    UserName = 'LaboratorioLaboral'
    CloseDataSource = False
    DataSource = DSlaboratorioLaboral
    BCDToCurrency = False
    Left = 344
    Top = 312
  end
  object RClinicaPenal: TfrxDBDataset
    UserName = 'ClinicaPenal'
    CloseDataSource = False
    DataSource = DSclinicaPenal
    BCDToCurrency = False
    Left = 344
    Top = 368
  end
  object RClinicaLaboral: TfrxDBDataset
    UserName = 'ClinicaLaboral'
    CloseDataSource = False
    DataSource = DSclinicaLaboral
    BCDToCurrency = False
    Left = 344
    Top = 424
  end
  object EstudiantesPorFecha: TfrxReport
    Version = '4.9'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Default'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 40814.407915694400000000
    ReportOptions.LastChange = 40814.407915694400000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      ''
      'begin'
      ''
      'end.')
    Left = 448
    Top = 416
    Datasets = <
      item
        DataSet = RestudianteEntreFechas
        DataSetName = 'EstudianteFechas'
      end>
    Variables = <>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Page1: TfrxReportPage
      PaperWidth = 215.900000000000000000
      PaperHeight = 279.400000000000000000
      PaperSize = 1
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object MasterData1: TfrxMasterData
        Height = 20.456710000000000000
        Top = 215.433210000000000000
        Width = 740.409927000000000000
        DataSet = RestudianteEntreFechas
        DataSetName = 'EstudianteFechas'
        RowCount = 0
        object Memo12: TfrxMemoView
          Left = 3.779530000000000000
          Width = 737.008350000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Highlight.Font.Charset = DEFAULT_CHARSET
          Highlight.Font.Color = clRed
          Highlight.Font.Height = -13
          Highlight.Font.Name = 'Arial'
          Highlight.Font.Style = []
          Highlight.Color = clSilver
          Highlight.Condition = '<Line> mod 2 = 1'
        end
        object EstudianteFechasCARNE: TfrxMemoView
          Left = 11.338590000000000000
          Top = 1.559060000000000000
          Width = 71.811070000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'CARNE'
          DataSet = RestudianteEntreFechas
          DataSetName = 'EstudianteFechas'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = []
          Memo.UTF8W = (
            '[EstudianteFechas."CARNE"]')
          ParentFont = False
        end
        object EstudianteFechasNOMBRECOMPLETO: TfrxMemoView
          Left = 104.724490000000000000
          Top = 1.559060000000000000
          Width = 359.055350000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'NOMBRECOMPLETO'
          DataSet = RestudianteEntreFechas
          DataSetName = 'EstudianteFechas'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = []
          Memo.UTF8W = (
            '[EstudianteFechas."NOMBRECOMPLETO"]')
          ParentFont = False
        end
        object EstudianteFechasPENSUM: TfrxMemoView
          Left = 475.937230000000000000
          Top = 1.559060000000000000
          Width = 64.252010000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'PENSUM'
          DataSet = RestudianteEntreFechas
          DataSetName = 'EstudianteFechas'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = []
          Memo.UTF8W = (
            '[EstudianteFechas."PENSUM"]')
          ParentFont = False
        end
        object EstudianteFechasFECHA_INGRESO: TfrxMemoView
          Left = 585.827150000000000000
          Top = 1.559060000000000000
          Width = 143.622140000000000000
          Height = 18.897650000000000000
          ShowHint = False
          DataField = 'FECHA_INGRESO'
          DataSet = RestudianteEntreFechas
          DataSetName = 'EstudianteFechas'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = []
          Memo.UTF8W = (
            '[EstudianteFechas."FECHA_INGRESO"]')
          ParentFont = False
        end
      end
      object ReportTitle1: TfrxReportTitle
        Height = 60.472480000000000000
        Top = 18.897650000000000000
        Width = 740.409927000000000000
        object Memo2: TfrxMemoView
          Left = 7.559060000000000000
          Width = 733.228820000000000000
          Height = 37.795300000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 6960384
          Font.Height = -27
          Font.Name = 'Constantia'
          Font.Style = []
          Memo.UTF8W = (
            'Listado de estudiantes inscritos')
          ParentFont = False
        end
        object Memo8: TfrxMemoView
          Left = 11.338590000000000000
          Top = 34.015770000000000000
          Width = 26.456710000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Century Schoolbook'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'del')
          ParentFont = False
        end
        object Memo9: TfrxMemoView
          Left = 45.354360000000000000
          Top = 34.015770000000000000
          Width = 98.267780000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Century Schoolbook'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'inicio')
          ParentFont = False
        end
        object Memo10: TfrxMemoView
          Left = 159.165430000000000000
          Top = 34.015770000000000000
          Width = 18.897650000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Century Schoolbook'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'al')
          ParentFont = False
        end
        object Memo11: TfrxMemoView
          Left = 181.842610000000000000
          Top = 34.015770000000000000
          Width = 113.385900000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -16
          Font.Name = 'Century Schoolbook'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'fin')
          ParentFont = False
        end
      end
      object PageFooter1: TfrxPageFooter
        Height = 22.677180000000000000
        Top = 294.803340000000000000
        Width = 740.409927000000000000
        object Memo1: TfrxMemoView
          Left = 665.197280000000000000
          Width = 75.590600000000000000
          Height = 18.897650000000000000
          ShowHint = False
          HAlign = haRight
          Memo.UTF8W = (
            '[Page#]')
        end
        object Memo36: TfrxMemoView
          Left = 7.559060000000000000
          Width = 627.401980000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = [fsItalic]
          Memo.UTF8W = (
            
              'Bufete Popular - Universidad Rafale Land'#237'var, Campus Quetzaltena' +
              'ngo  [<Date>] - [Time]')
          ParentFont = False
        end
      end
      object Header1: TfrxHeader
        Height = 50.913420000000000000
        Top = 139.842610000000000000
        Width = 740.409927000000000000
        object Memo3: TfrxMemoView
          Left = 14.000000000000000000
          Top = 32.015770000000000000
          Width = 52.913420000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Carn'#233)
          ParentFont = False
        end
        object Memo4: TfrxMemoView
          Left = 107.385900000000000000
          Top = 32.015770000000000000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Nombre')
          ParentFont = False
        end
        object Memo5: TfrxMemoView
          Left = 474.819110000000000000
          Top = 32.015770000000000000
          Width = 94.488250000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Pensum')
          ParentFont = False
        end
        object Memo6: TfrxMemoView
          Left = 584.709030000000000000
          Top = 32.015770000000000000
          Width = 139.842610000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Franklin Gothic Book'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Fecha de inscripci'#243'n')
          ParentFont = False
        end
        object Memo42: TfrxMemoView
          Left = 11.338590000000000000
          Width = 234.330860000000000000
          Height = 26.456710000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = 43218
          Font.Height = -16
          Font.Name = 'Constantia'
          Font.Style = [fsBold]
          Memo.UTF8W = (
            'Listado de estudiantes')
          ParentFont = False
        end
        object Line16: TfrxLineView
          Left = 12.456710000000000000
          Top = 19.897650000000000000
          Width = 714.331170000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
        object Line17: TfrxLineView
          Left = 12.456710000000000000
          Top = 0.881880000000000000
          Width = 714.331170000000000000
          ShowHint = False
          Frame.Color = clNavy
          Frame.Typ = [ftTop]
        end
      end
    end
  end
  object EstudianteEntreFechas: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    OnCalcFields = EstudianteEntreFechasCalcFields
    Parameters = <
      item
        Name = 'inicio'
        Attributes = [paNullable]
        DataType = ftDateTime
        NumericScale = 3
        Precision = 23
        Size = 16
        Value = Null
      end
      item
        Name = 'fin'
        Attributes = [paNullable]
        DataType = ftDateTime
        NumericScale = 3
        Precision = 23
        Size = 16
        Value = Null
      end>
    SQL.Strings = (
      'select * from ESTUDIANTE'
      'where FECHA_INGRESO between :inicio and :fin')
    Left = 448
    Top = 256
    object EstudianteEntreFechasCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object EstudianteEntreFechasID_MUNICIPIO: TIntegerField
      FieldName = 'ID_MUNICIPIO'
    end
    object EstudianteEntreFechasID_DEPTO: TIntegerField
      FieldName = 'ID_DEPTO'
    end
    object EstudianteEntreFechasID_ESTADO_CIVIL: TIntegerField
      FieldName = 'ID_ESTADO_CIVIL'
    end
    object EstudianteEntreFechasNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Size = 50
    end
    object EstudianteEntreFechasAPELLIDOS: TStringField
      FieldName = 'APELLIDOS'
      Size = 30
    end
    object EstudianteEntreFechasTEL_CASA: TStringField
      FieldName = 'TEL_CASA'
      FixedChar = True
      Size = 9
    end
    object EstudianteEntreFechasTEL_PERSONAL: TStringField
      FieldName = 'TEL_PERSONAL'
      FixedChar = True
      Size = 9
    end
    object EstudianteEntreFechasTEL_TRABAJO: TStringField
      FieldName = 'TEL_TRABAJO'
      FixedChar = True
      Size = 9
    end
    object EstudianteEntreFechasDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Size = 150
    end
    object EstudianteEntreFechasCEDULA_REGISTRO: TIntegerField
      FieldName = 'CEDULA_REGISTRO'
    end
    object EstudianteEntreFechasDPI: TStringField
      FieldName = 'DPI'
      FixedChar = True
      Size = 15
    end
    object EstudianteEntreFechasEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 60
    end
    object EstudianteEntreFechasPENSUM: TStringField
      FieldName = 'PENSUM'
      FixedChar = True
      Size = 8
    end
    object EstudianteEntreFechasNO_FOLIO: TStringField
      FieldName = 'NO_FOLIO'
      Size = 10
    end
    object EstudianteEntreFechasNO_LIBRO: TStringField
      FieldName = 'NO_LIBRO'
      Size = 10
    end
    object EstudianteEntreFechasFECHA_INGRESO: TDateTimeField
      FieldName = 'FECHA_INGRESO'
    end
    object EstudianteEntreFechasNOMBRECOMPLETO: TStringField
      FieldKind = fkCalculated
      FieldName = 'NOMBRECOMPLETO'
      Size = 60
      Calculated = True
    end
  end
  object DSestudianteEntreFechas: TDataSource
    DataSet = EstudianteEntreFechas
    Left = 448
    Top = 304
  end
  object RestudianteEntreFechas: TfrxDBDataset
    UserName = 'EstudianteFechas'
    CloseDataSource = False
    DataSource = DSestudianteEntreFechas
    BCDToCurrency = False
    Left = 448
    Top = 360
  end
  object DSalertivos: TDataSource
    DataSet = Alertivos
    Left = 184
    Top = 440
  end
  object Alertivos: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from ALERTIVO')
    Left = 104
    Top = 440
    object AlertivosID_ALERTIVO: TIntegerField
      FieldName = 'ID_ALERTIVO'
    end
    object AlertivosID_USUARIO: TIntegerField
      FieldName = 'ID_USUARIO'
    end
    object AlertivosCARNE: TStringField
      FieldName = 'CARNE'
      FixedChar = True
      Size = 9
    end
    object AlertivosMENSAJE: TStringField
      FieldName = 'MENSAJE'
      Size = 50
    end
    object AlertivosACTIVO: TBooleanField
      FieldName = 'ACTIVO'
    end
    object AlertivosLEIDO: TBooleanField
      FieldName = 'LEIDO'
    end
    object AlertivosCASO: TStringField
      FieldName = 'CASO'
      Size = 11
    end
    object AlertivosATENDIDO: TBooleanField
      FieldName = 'ATENDIDO'
    end
    object AlertivosFECHAMODIFICACION: TDateTimeField
      FieldName = 'FECHAMODIFICACION'
    end
  end
  object Estudiantes: TADOTable
    Connection = ADOConnection1
    TableName = 'ESTUDIANTE'
    Left = 568
    Top = 432
  end
  object UsuarioLogin: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from USUARIO')
    Left = 216
    Top = 64
    object UsuarioLoginID_USUARIO: TAutoIncField
      FieldName = 'ID_USUARIO'
      ReadOnly = True
    end
    object UsuarioLoginNOMBRE: TStringField
      FieldName = 'NOMBRE'
      Size = 50
    end
    object UsuarioLoginAPELLIDOS: TStringField
      FieldName = 'APELLIDOS'
      Size = 30
    end
    object UsuarioLoginTIPO: TSmallintField
      FieldName = 'TIPO'
    end
    object UsuarioLoginEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 60
    end
    object UsuarioLoginDIRECCION: TStringField
      FieldName = 'DIRECCION'
      Size = 150
    end
    object UsuarioLoginTEL_CASA: TStringField
      FieldName = 'TEL_CASA'
      FixedChar = True
      Size = 9
    end
    object UsuarioLoginCELULAR: TStringField
      FieldName = 'CELULAR'
      FixedChar = True
      Size = 9
    end
    object UsuarioLoginLABORAL: TBooleanField
      FieldName = 'LABORAL'
    end
    object UsuarioLoginPENAL: TBooleanField
      FieldName = 'PENAL'
    end
    object UsuarioLoginCIVIL: TBooleanField
      FieldName = 'CIVIL'
    end
    object UsuarioLoginSUPERVISOR: TBooleanField
      FieldName = 'SUPERVISOR'
    end
    object UsuarioLoginNICK: TStringField
      FieldName = 'NICK'
      Size = 15
    end
    object UsuarioLoginPASSWORD: TStringField
      FieldName = 'PASSWORD'
      FixedChar = True
      Size = 32
    end
    object UsuarioLoginACTIVO: TBooleanField
      FieldName = 'ACTIVO'
    end
  end
end
